home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 32 / Mac Magazin and MacEasy Magazine CD - Issue 32.iso / Grafik & Text / OzTeX3.0 / TeX-inputs / LaTeX / graphics / keyval.sty < prev    next >
Text File  |  1997-03-07  |  2KB  |  59 lines
  1. %%
  2. %% This is file `keyval.sty',
  3. %% generated with the docstrip utility.
  4. %%
  5. %% The original source files were:
  6. %%
  7. %% keyval.dtx  (with options: `package')
  8. %% 
  9. %% File: keyval.dtx Copyright (C) 1993 1994 1995 David Carlisle
  10. \NeedsTeXFormat{LaTeX2e}
  11. \ProvidesPackage{keyval}
  12.                  [1995/09/21 v1.09 key=value parser (DPC)]
  13. \def\setkeys#1#2{%
  14.   \def\KV@prefix{KV@#1@}%
  15.   \KV@do#2,\relax,}
  16. \def\KV@do#1,{%
  17.  \ifx\relax#1\empty\else
  18.   \KV@split#1==\relax
  19.   \expandafter\KV@do\fi}
  20. \def\KV@split#1=#2=#3\relax{%
  21.   \KV@@sp@def\@tempa{#1}%
  22.   \ifx\@tempa\@empty\else
  23.     \expandafter\let\expandafter\@tempc
  24.       \csname\KV@prefix\@tempa\endcsname
  25.     \ifx\@tempc\relax
  26.       \KV@err{\@tempa\space undefined}%
  27.     \else
  28.       \ifx\@empty#3\@empty
  29.         \KV@default
  30.       \else
  31.         \KV@@sp@def\@tempb{#2}%
  32.         \expandafter\@tempc\expandafter{\@tempb}\relax
  33.       \fi
  34.     \fi
  35.   \fi}
  36. \def\KV@default{%
  37.   \expandafter\let\expandafter\@tempb
  38.     \csname\KV@prefix\@tempa @default\endcsname
  39.   \ifx\@tempb\relax
  40.     \KV@err{No value specified for \@tempa}%
  41.   \else
  42.     \@tempb\relax
  43.   \fi}
  44. \def\KV@err#1{\errmessage{key-val: #1}}
  45. \def\@tempa#1{%
  46. \def\KV@@sp@def##1##2{\KV@@sp@b##2\@nil\@nil#1\@nil\relax##1}}
  47. \@tempa{ }
  48. \def\KV@@sp@b#1#2 \@nil{\KV@@sp@c#1#2}
  49. \def\KV@@sp@c#1\@nil#2\relax#3{\def#3{#1}}
  50. \def\define@key#1#2{%
  51.   \@ifnextchar[{\KV@def{#1}{#2}}{\@namedef{KV@#1@#2}####1}}
  52. \def\KV@def#1#2[#3]{%
  53.   \@namedef{KV@#1@#2@default\expandafter}\expandafter
  54.     {\csname KV@#1@#2\endcsname{#3}}%
  55.   \@namedef{KV@#1@#2}##1}
  56. \endinput
  57. %%
  58. %% End of file `keyval.sty'.
  59.